From 130bf67c14ed2eb6c1673fa65402eb6f931c2ba0 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 1 Jun 1993 04:52:28 +0000 Subject: [PATCH] (isearch-mode): If enter recursive-edit, also bind isearch-recursive-edit. --- lisp/isearch.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/isearch.el b/lisp/isearch.el index 16ab73c73c2..ff85d932923 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -4,7 +4,7 @@ ;; Author: Daniel LaLiberte -;; |$Date: 1993/05/27 03:33:12 $|$Revision: 1.37 $ +;; |$Date: 1993/05/29 06:27:47 $|$Revision: 1.38 $ ;; This file is not yet part of GNU Emacs, but it is based almost ;; entirely on isearch.el which is part of GNU Emacs. @@ -524,7 +524,9 @@ is treated as a regexp. See \\[isearch-forward] for more info." ;; isearch-mode can be made modal (in the sense of not returning to ;; the calling function until searching is completed) by entering ;; a recursive-edit and exiting it when done isearching. - (if recursive-edit (recursive-edit)) + (if recursive-edit + (let ((isearch-recursive-edit t)) + (recursive-edit))) ) -- 2.30.2